Attribute VB_Name = "Module1"
Private Function x2(x As Single) As Single
    x2 = x * x
End Function

Public Function x3(x As Single) As Single
    x3 = x * x * x
End Function
